vignettes/01-ejemplo df.R

In igutierrezm/mypkgr: Diccionario de variables del OLN

#===============================================================================
# BBDD de prueba
#===============================================================================

# x1 <- un factor (con todos los niveles en la muestra)
x1 <- factor(c(1, 2, NA, 3), 
            levels = c(1, 2, 3, NA), 
            labels = c("c", "b", "a", "ns/nr"),
            exclude = NULL)

# x2 <- un factor (con todos los niveles en la muestra)
x2 <- factor(c(1, 2, 3, 3), 
            levels = c(1, 2, 3, NA), 
            labels = c("c", "b", "a", "ns/nr"),
            exclude = NULL)
# x3 <- una variable numérica (sin NA)
x3 <- c(1, 2, 3, 3)

# x4 <- una variable numérica (con NA)
x4 <- c(2, 3, 4, NA) 

# variables relacionadas con el diseño muestral
n      <- c(1, 1, 1, 1)
pw     <- c(2, 2, 2, 2)
psu    <- c(1, 2, 3, 4)
strata <- c(1, 1, 1, 1)

# df final
df <- data.frame(x1, x2, x3, x4, n, pw, psu, strata)

# diseño muestral
df_svy <-
  survey::svydesign(~psu, strata = ~strata, weights = ~pw, data = df)

# guarda el resultado
saveRDS(df_svy, "df1.rds")